package com.will.nio.selector;

import lombok.extern.slf4j.Slf4j;

import java.io.IOException;
import java.net.InetSocketAddress;
import java.nio.ByteBuffer;
import java.nio.channels.*;
import java.util.Iterator;

import static com.will.nio.buffer.ByteBufferUtil.debugAll;

/**
 * @author Will
 * @description:
 *              Selector    -   read 事件中，处理消息的边界问题
 * @date 2023-04-20 21:18
 * @version: 1.0
 */
@Slf4j
public class ReadBorderSelectorServer {
    public static void main(String[] args) throws IOException {
        // 1. 创建 selector，管理多个 channel
        Selector selector = Selector.open();
        ServerSocketChannel ssc = ServerSocketChannel.open();
        ssc.configureBlocking(false);
        // 2. 建立 selector 和 channel 的联系（注册），channel 必须工作在非阻塞模式下
        // SelectionKey 就是将来事件发生后，通过它可以知道什么事件和哪个 channel 发生的事件
        SelectionKey sscKey = ssc.register(selector, 0, null);
        log.debug("register key:{}", sscKey);
        // 只关注 accept 事件
        sscKey.interestOps(SelectionKey.OP_ACCEPT);
        ssc.bind(new InetSocketAddress(8080));
        while (true) {
            // 3. select 方法，没有事件发生，线程阻塞，有事件，线程才会恢复运行
            // select 方法，有事件发生，但未处理，线程不会阻塞，若该事件取消，则线程阻塞
            // 因此事件发生后，要么取消，要么处理
            selector.select();
            // 4. 处理事件，selectedKeys 内部包含了所有发生的事件
            Iterator<SelectionKey> iterator = selector.selectedKeys().iterator();
            while (iterator.hasNext()) {
                SelectionKey key = iterator.next();
                log.debug("key:{}", key);
                // 5. 区分事件类型
                if (key.isAcceptable()) {
                    ServerSocketChannel channel = (ServerSocketChannel)key.channel();
                    SocketChannel sc = channel.accept();
                    sc.configureBlocking(false);
                    // 将一个 ByteBuffer 作为附件关联到 SelectionKey 上
                    SelectionKey scKey = sc.register(selector, 0, ByteBuffer.allocate(16));
                    // 只关注 read 事件
                    scKey.interestOps(SelectionKey.OP_READ);
                    log.debug("{}", sc);
                } else if (key.isReadable()) {
                    try {
                        SocketChannel sc = (SocketChannel) key.channel();
                        ByteBuffer buffer = (ByteBuffer) key.attachment();
                        // 处理消息边界问题时，同一消息触发多次 read 事件，前一次 read 事件读取到的消息会丢失
                        // 因此 ByteBuffer 不可为局部变量，需要作为全局变量存在于 Channel 中
                        // ByteBuffer buffer = ByteBuffer.allocate(16);
                        int read = sc.read(buffer);
                        if (read == -1) {
                            key.cancel();
                        } else {
                            split(buffer);
                            // 没有读取到分隔符，buffer 的 position 和 limit 相等，此时需要扩容
                            if (buffer.position() == buffer.limit()) {
                                ByteBuffer newBuffer = ByteBuffer.allocate(2 * buffer.capacity());
                                buffer.flip();
                                newBuffer.put(buffer);
                                key.attach(newBuffer);
                            }
                        }
                    } catch (IOException e) {
                        e.printStackTrace();
                        // 因为客户端断开了，因此需要从 selector 的 keys 中删除 key，后续不再监听事件
                        key.cancel();
                    }
                }
                // 6. 事件处理完毕，手动删除
                iterator.remove();
            }
        }
    }

    public static void split(ByteBuffer buffer) {
        // 切换到读模式
        buffer.flip();
        for (int i = 0; i < buffer.limit(); i++) {
            // 找到一条完整消息
            if (buffer.get(i) == '\n') {
                int length = i + 1 - buffer.position();
                // 将这条完整消息存入新的 ByteBuffer
                ByteBuffer target = ByteBuffer.allocate(length);
                for (int j = 0; j < length; j++) {
                    target.put(buffer.get());
                }
                debugAll(target);
            }
        }
        // 切换到写模式，这里不能使用 clear()，没有读取到的数据需要使用 compact()，放到下一次读
        buffer.compact();
    }
}
